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NETNPAGED.SDL = DECnet non-paged control structures 
Version: *v04-000' 
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COPYRIGHT (c) 1978, 1980, 1982, 1984 B 
DIGITAL EQUIPMENT CORPORATION, MAYNARD. MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS i acche cS FURNISHED UNDER A LICENSE AND MAY BE USED AND gt ke 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 


® 
® 
® 
® 
® 
® 
® 
INCLUSION TICE. SOFTWARE OR ANY OTHER * 
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * 
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
TRANSFERRED. * 
® 
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® 
® 
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® 
® 
x 
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BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
CORPORAT ION. 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


@eeeeeeeee eee eee eeeeanne 


PARARAAAALALALALALALALELLAAEALESALELELE LE SELES ESE RSA SES ARLES EEA A SESE ESSE 
MODIFIED BY: 
v03-020 TMHO020 im Halvorsen 22-Apr-1984 


Add ELECT_TIM tag to LPD for the election peegraseten timer. 
Add PvC_ACCESS lag to indicate PVC is ACCE 


v03-019 RNGOO19 Rod Gamache 24-Mar-1984 
Add NET$V_ACT bit to RCBSB. STATUS byte. 

v03-018 PRBO319 Paul Beck 9-Mar-1984 9:34 
Add NETUPD$_TEST_ADJ 

v017 RNGOO17 Rod Gamache 17-Feb-1984 
Ads NETUPDS$_CRELNK for creating logical Links. 
Add ACT_TIMER and AQB_CNT bytes to the RCB. 

v016 TMHOO16 Tim Halvorsen 11-Jul-1983 
Add executor cluster address to RCB. 

v015 sy pe bb Tim Halvorsen 29-Mar-1983 

Fix comments about MCOUNT offset 
v014 TMHOO14 Tim Halvorsen 13-Mar-1985 


Add flag to disable AOA lookups (in the event we are 
an isolated area router). 

Add Men SMT RES TR. datalink a ‘enaent {Logs ‘ 

Remove XMT_RESTR flag and add XMT_DALLY flag. 


AQQQAAAAQAAAAQAAAAAAAAAOAAAAAA — AAA AAARAAARARSARAAAAAAAAAAAA 
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v013 TMHOO13 Rod Gama t+ -1983 
Add flag to toggle datali ~ Line on circuit startup. 


v012 TMHOO12 Tim Halvorsen 14-Feb-1983 
Add cell to hold datalink buffer size in LPD. 
Remove XWB/LSB structures (now replaced by 
@ separate SDL). 


v011 TMHOO11 Tim Halvorsen 13-0ct-1982 
Add storage for area routing support. 
v010 TMHOO010 Tim Halvorsen 28-Sep-1982 
Add cell to RCB giving the designated” router 
if we are an endnode. 
v009 RNGOOO1 Rod Gamache 20-Aug-1982 
Add “‘broadcast to all endnodes"’ flag to LPD. 
v008 TMHOO08 Tim Halvorsen 07-Jul-1982 
Add Bg one ne. circuit’ flag to LPD. Include ‘'standard'' 
12 byte header. Removed RCBSL_LOC_LPD ond RCBSL_ECL_IRP. 


Added ‘tepse. Lor. INK. Added RTBSL_ PTR_JNX and RCBSL™ PTR. OCS. 
— cost aia t LPD. 
Remove all etields — LPD, ae are in new ADJ block. 
Add RCBSW_MAX_RTG and MAX_ 
Add LPD alt . oint to & eset recently received election 
message’’ for BC LPDs. 
Add cell be RCB to hold the type of executor (routing, 
endnode = ® 
Add ceil te “i Pb to hold the our NI router priority. 
Add cell to LPD to hold the designated router on the circuit, 
so that NETDRIVER can send the Router Hello msg to endnodes. 
ooo ne Bone KH, code to instruct NETDRIVER to send a hello 
Add SRM bitmasks to “LPD, in order to hold ‘send pouting msg'’ 
context for each circuit. This is required for segmented 
routing meeanget. Remove RCBSV_STS_XRT flag, since that is 
now replaced the bitmasks. 
Add cell to RCB to cecore current position in the ADJ vector 
to be used by the Listener process, since it will only do a 
fraction of the adjacencies each second. 
Add cell to LPD which determines the type of node we will 
“Look Like’’ on that circuit (endnode, router, etc.) 


v007 MH0007 Tim Halvorsen 23-Jun-1982 
haa CXB_FREE Listhead to RCB 
v006 MHO006 Halvorsen 19-May rie 


haa LPO$B8 _PVCFLG. tre’ gnd associated iags 
Add LPDSV. x25, LPDS$V _X25BLK and LPDS$V tne MING flags 
Add LP PDsB- TART S$ tS record number of startup 
Finc e last ‘run’ state 
hdd “defin tions for NI adjacency database. 


v03-05 ADE0033 A.Eldridge 15-Feb-1982 
Added RCB$B_ECL RFLW and’ changed art SPARE to XWBSB_INC_RFLW. 


AAA AAAAAAAAAAAAAAAAA AAA APA AAAAAAAAAAAAAAAAAARAAAAAAN 
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V03-04 
v03-03 


v03-02 


ADE0032 A.Eldri 
Added XWBSL_DI_CXB. 


ADE0031 A.Eldri 
Added ICB$x_RID and XwWB 


ADE0030 A.Eldri 
Added RCB$B_ECL_DAC and 
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dge 15-Feb-1982 
gge 18=Dec-198' 
x RID. 


d 30-Nov-1981 


e 
RcBsB_ECi_pPX. 
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Routing Control Block definition. 


The RCB is used as the network Volume Control Block. 

Because miscellaneous software scans the 1/0 — base, the following fields 
{ 

{ 

{ 


should be kept at the same offset as their VC 


RCBSW_TRANS = VCBSW_TRANS (offset 
RCBSL_AQB = VCBSL_AQB TR 


module SRCBDEF ; 


aggregate RCBDEF structure fill prefix RCBS$; 
IRP_FREE quadword unsigned; 
SIZE word unsigned; 
TYPE byte unsigned; 
STATUS_OVERLAY union fill; 
STATUS arte unsigned; 
STATUS 8 TS structure fill; 
LVC2 bitfield mask; 


ACT bitfield mask; 
end STATUS BITS; 

end STATUS_OVERLAY; 

TRANS word unsigned; 

ADDR word unsigned; 


2 


AQB longword unsigned; 

ACP_UCB Longword unsigned; 
PTR_JNX Longword unsigned; 
PTR_OA Longword unsigned; 
PTR_AOA longword unsigned; 


PTR_LTB Longword unsigned; 
PTR_LPD Longword unsigned; 
PTR_ADJ lLongword unsigned; 
PTR_TQE longword unsigned; 
PTR_NDC Longword unsigned; 


PTR_OCS lLongword unsigned; 
LOC_RCV quadword unsigned; 
LOC_XMT quadword unsigned; 
IRP_WAIT quadword unsigned; 


MCOUNT word unsigned; 


CUR_LNK word unsigned; 
MAX_LNK word unsigned; 
MAX_ADDR word unsigned; 


MAX_LPD byte unsigned; 
MAX_SNK byte unsigned; 
MAX_VISIT byte unsigned; 
INT_PTH byte unsigned; 


counter-parts: 


12 decimal) 
=. .™ ) 


Listhead of free IRPs 
Bytes allocated for structure 
Structure type 


Status flags 


True if we can use level 2 routing (AOA, etc) 


False if 
(ROUTIN 


Outstanding transaction count 
Local node address 


Ptr 
Ptr 
Poin 


Transmit Listhead for ‘local’ 


to 
to 
to 
to 
to 


to 
to 


AQB 

Network ACP’s UCB 

ournal buffer 

utput Agjacency vector 

Area Output Adjacency vector 


logical Link table (dispatch vector) 
Logical Path Descriptor vector 


ter to vector of adjacency blocks (0 based) 
Ptr to internal Timer Queue element 
Ptr to Node Counters vector 


Ptr to NETDRIVER’s control storage 
Receive listhead for ‘‘local’’ Datalink 


Datalink 


Listhead of fork processes waiting for an IRP 


Mount count - includes current logical Links plus 1 


for the ACP reference 

Current number of logical Links 
Max allowable logical links 

Max allowable node address 


Max number of DLL LPDs 


Max IRPs queueable to any ee queue 
s 


nodes a packet may v ; 
Index of path to intercept node: 0=>no intercept 


we detect that we are an isolated area router 
G LAYER BIT) Set if NETACP is considered active 
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DLL byte 
he unsi 
he te 
R e 


word 
lLongw 


word 
word 


word 
word 
word 
_CTl word 

SEGSIZ wor 
TOTBUFSIZ wor 


CUR_PKT word 
MAX_PKT word 


PKT_FREE word 
PKT_PEAK word 


PKT_FAIL byte 
MEM_FAIL byte 
ETY byte unsi 
HOMEAREA byte 


MAX_AREA byte 
“ALTAS’' word 
ACT_TIMER byt 


unsigned; 

gned; 
unsigned; 

unsigned; 


unsigned; 
unsigned; 
unsigned; 
unsigned; 


unsigned; 
unsigned; 
ord unsigned; 


unsigned; 
unsigned; 


unsigned; 
unsigned; 
unsigned; 
unsigned; 


d unsigned; 
d unsigned; 


unsigned; 
unsigned; 


unsigned; 
unsigned; 


unsigned; 

unsigned; 
gned; 

unsigned; 


unsigned; 
unsigned; 
e unsigned; 


ABS_TIM Longword unsigned; 


CNT~NOL_OVERL 


AY union 


CNT_NOL byte unsigned; 
CNT_1ST byte ungioned: 


constant 


CNT_OPL byte 
CNT_PFE byte 


CNT_RUL byte 
CNT_VER byte 
CNT_NUL word 


NT 


unsigned; 
unsigned; 


unsigned; 
unsigned; 
unsigned; 


fill; 
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tive data Links 

ternal state 

L receiver pipeline quota (in packets) 
retransmit factor 


Ac 
In 
EC 
ECL 

ECL delay factor 

ECL delay weight 

ECL default access state 

ECL default proxy access state 

Size of adjacency vector (PTR_ADJ), in entries 
Number of reve destinations’ (LPDs + BRAs) 
Linked List head for direct-circuit-access XWBs 


Min delay before next routing update in seconds 
Max time before next routing update in seconds 


logical Link inactivity interval in seconds 
Max inbound connect interval in seconds 

Max outbound connect interval in seconds 

Sample interval in seconds 


Default ECL data segment size (excludes 
Buffer size including NSP header + 6 byt 
+ CXBSC_OVERHEAD bytes for datalink overhead 
Current total IRPs 

Max total IRPs 


Packets Left in Transmit pool 
Peak number of packets used 


header size) 
e 


Packet allocation failures (over packet quota) 
Packet allocation failures (insufficent memory) 
Type of executor node (ADJSC_PTY_xxx) 

Our home area number (only if area router) 


Max allowable area address 
Alias local address (0 if none) 
ACP activity timer 
Transport layer counters 
Absolute time counters were last zeroed 


Node out-of-range packet loss 
counter cell marker 


* First 
equals i2 prefix RCB tag $C;/* Number of bytes used for counters 


Aged packet loss 
Oversized packet loss 
Packet format error 


Partial routing update loss 
Verification rejects 
Node unreachable packet loss 
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CNT_XRE word unsigned; 
CNT_MLL word unsigned; 


CXB_FREE quadword unsigned; 
LSN_ADJ byte unsigned; 
AQB_CNT byte unsigned; 

DRT word unsigned; 


LVL2 word uns igned: 
constant ""LENGTH'' equals . prefix RCB$ tag K; 
constant “‘LENGTH’’ equals . prefix RCB$ tag C; 
end RCBDEF; 
end_module SRCBDEF; 


module SLPDDEF ; 


/* 
/* 
/* 
/* 

® 


Xmitted connect resource errors (ECL layer counter) 
Maximum logical Links active (ECL Layer counter) 


End of transport counters 


Free CXB Listhead 

Current position in ADJ for Listener processing 
Count of entries on AQB 

Designated router ADJ index for all transmits 
with an unspecified output adjacency 

Level 2 router ADJ index for all transmits with 
Structure size 

Structure size 

an unspecified output adjacency (ETY=PH4 only) 
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: Logical Path Descriptor (LPD) 
The following control block describes a path to a data sink/source -- either 


a datalink driver (e.g., XMDRIVER) or an end communications level (ECL) 
: driver (e.g., NETDRIVER). 


aggregate LPDDEF structure fill prefix LPD$; 


WAIT quadword unsigned; /* Listhead of fork processes waiting for a ‘request’ 
/* slot on the LPD sink queue. 
SIZE word unsigned; /* Structure size 
TYPE ope unsigned; /* Structure type 
STARTUPS byte unsigned; /* Number of datalink startup attempts since Last ‘‘run’’ 
WIND longword unsigned; /* Driver context - WIND field image for IRPs 
UCB Longword unsigned; /* Driver context - UCB address 
CHAN word unsigned; /* ACP channel to device 
TIM_TLK word unsigned; /* *"Talker’’ timer 
INT_TLK word unsigned; /* ‘Talker’ interval (used to init TIM_TLK) 
TSTCNT byte unsigned; /* Number of test messages left to send before entering 
/* the RUN state 
ASTCNT byte unsigned; /* Number of outstanding ASTs 
IRPCNT byte re /* Number of outstanding IRPs queued by NETDRIVER 
ETY ozre unsigned; /* Our node type, on this circuit 
XMT_SRL byte unsigned; /* Output ‘square root Limiter'’ value 
XMT_IPL byte unsigned; /* Output queue ‘input packet Limiter’’ 
PTH-OVERLAY union fill; 
PTH word unsigned /* Path ID 


gned; 
PTH_FIELDS structure fill; 
PTH_INX byte unsigned; /* Path index 
PTH_SEQ byte unsigned; /* Path sequence 
constant LOC_INX equals 1 prefix LPD oe tee Index associate with the primary ‘local’ LPD 


ie Status on control info 
® 
end PTH_FIELDS; 
end PTH OVERLAY; 
STS_OVERLAY union fill; 
STS word unsigned; /* Status bits as follows: 
STS_BITS structure fill; 
ACTIVE bitfield mask; /* Path is active 
STRTIM bitfield mask; /* Set if restart supression timer is ticking 
DLE bitfield mask; /* Set if in use for physical Line service 
ACCESS bitfield mask; /* Set if LPD is being accessed’’ by a server process 
RUN bitfield mask; /* Set if active and in use for normal data msgs 
XBF bitfield mask; /* Set if Xmitter uses buffere 
RBF bitfield mask; /* Set if sag ane uses buffered 1/0 : 
X25 bitfield mask; /* Set if X.25 datalink mapping used on this circuit 
X25BLK bitfield mask; /* Set if blogk ing requested for X.25 datalink 
INCOMING bitfield mask; /* Set if X.25 circuit waiting for incoming cali 
BC bitfield mask; /* Set if circuit is a broadcast circuit (NI) 
XEND bitfield mask; /* Set if ‘’send hello msg to all endnodes’’ is requested 
TOGGLE bitfield mask; /* Set if Listener timeout on DMC Line (toggles Line) 
ALIGNW bitfield mask; /* Set if datalink requires word alignment 
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ERLAY; 
XMTFLG_OVERLAY union fill; 
XMTFLG byte unsigned; 


XMTFLG_ BITS structure fill; 
XMT_DALLY bitfield mask; 
XMT_STR bitfield mask; 
XMT_VRF bitfield mask; 
XMT-IDLE bitfield mask; 
XMT_LRT bitfield mask; 
XMT“HEL bitfield mask; 
XMT_ART bitfield mask; 

end XMTF ITS; 


LGB 
end XMTFLG_OVERLAY; 
PVCFLG_OVERLAY union fill; 

PVCFLG byte unsigned; 


PVCFLG_BITS structure fill; 
PvC_AC 


C_ACCESS bitfield mask; 
PVC_RESTRT bitfield mask; 
PVC_RESET bitfield mask; 
FILL_2 bitfield bength 4 mask: 
PVC_ACCESSED bitfield mask; 

nd PVCFLG_BITS; 


e VCFLG 
end PVCFLG_OVERLAY; 


cOsT arte unsigned: 
te uns re 
FILL_1 byte fill prefix LPDDEF tag $$; 
DRT word unsigned; 
RTR_LIST longword unsigned; 


RCV_IRP Longword unsigned; 


ABS_TIM Longwerd unsigned; 
CNT_APR_OVERLAY union fill; 
CNT_APR longword unsigned; 
CNT_1ST aye unsigned; 
end CNT-APR_OVERLAY; 
CNT_TPR Longword unsigned; 
CNT_DPS lLongword unsigned; 
CNT_TPS sangvere unsigned; 
CNT_ACL word unsigned; 
CNT_TCL word unsigned; 
CNT_LDN byte unsigned; 
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Set if datalink requires quadword 0} !pnwent 
Set if election suppression timer ticking 


Xmit flags -- since a FFS is used to schedule message 
transimission, the order of these flags are crucial 


Dally before sending a start msg (must preceed STR) 
Xmit a Transport start ms 

Xmit a Transport verification ms 

Signals ‘‘no more Transport init messages to send’’ 
Xmit a Transport routing message 

Xmit a Transport hello message 

Xmit a Transport Area routing message 


X.25 PVC startup flags -- since a FFS is used to 
schedule it, the order of these flags are crucial 


Issue an I0$_ACCESS to establish the connection 
Issue a ‘'restart confirmation’ ‘ 

Issue a ‘‘reset'' or ‘reset confirmation’ 

(reserve low 4 bits for state, 3 more bits unused) 
True if PVC ACCESSed 


Internal state used by the ACP for initialization 
Circuit sub-state 

Associate PLVEC index 

Circuit cost ‘ 

Circuit NI router priority 


spare 
Designated router on NI ‘ 
For 6C LPDs, address of ‘most recently received 
election ny from Router Hello messages 
(stored as an byte-counted otring 

Address of suspended receiver IR 


Transport layer counters 
Absolute time counters were last zeroed 


Arriving packets received 
First counter cell marker 


Transit packets received 

Departing packets sent 

Transit packets sent 

Arriving congestion loss 

Transit congestion loss 

Line down events 

Initialization failures 

Number of bytes used for counters 

Datalink buffer size including Transport overhead 
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/* (variable 4 header depending on the datalink) 
n 


SRM_POS byte unsigned; /* Current posit in transmit XMT_SRM bitmask (bit :) 
SRM_LEFT byte unsigned; /* Number of transmit XMT_SRM bits Teft to check/process 
ASRA_POS byte unsigned; /* Current position in transmit XMT_ASRM bitmask (bit !) 
ASRM_LEFT byte unsigned; /* Number of transmit XMT_ASRM bits left to check/process 
SRM byte unsigned tag G dimension 4; /*(32/8) ; ‘Send routing message’’ flags (one per segment) 
XMT_SRM byte unsigned tag G dimension 4; /* Copy of SRM flags used for ese msg transmission 

er of nodes per segment (bit) 


constant SRM_NODES equals prefix LPD tag $C; /* Num 
constant SRM_SHFT equals prefix LPD tag $C; /* Bit shift for node<->bit! 
constant SRM-SIZE equals 32 prefix LPD tag $C; /* Number of bits in SRM bitmask (allows for 1024 nodes) 


ASRM byte unsigned tag G dimension 4; /*(1/8); "Send area routing message’’ flags (one per segment) 
XMT_ASRM byte unsigned tag G dimension 4; /* Copy of ASRM flags used for rte msg transmission 

constant ASRM_AREAS equals 64 prefix LPD tag $C; /* Number of areas per segment (bit) 

constant ASRM_SHFT equals 6 prefix LPD tag $C; /* Bit shift for area<->bit! 

constant ASRM_SIZE equals 1 prefix LPD tag $C; /* Number of bits in ASRM bitmask (allows for 64 areas) 


CACHE soners unsigned; /* Address of endnode cache storage (endnodes only) 
constant LENGTH’ equals . prefix LPD$ tag K; /* Structure size 
constant "‘LENGTH’’ equals . prefix LPD$ tag C; /* Structure size 


end LPDDEF; 
end_module SLPDDEF; 
module SADJDEF; 
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/* 
~ Adjaceny Node Data Base Block (ADJ) 


/* This block describes the contents of the Adjacency Node Data Base. The 
/* Adjacency Node Data Base is used in conjunction with the LPD data base 
/* to describe the destination to any node in the network. 


~™ 
i 


eeeregete ADJDEF structure fill prefix ADJ$; 
S$ S_OVERLAY union fill; 


S byte unsigned; /* Status flags 
STS_BITS structure fill; 
INUSE bitfield mask; /* Adjacency block in use 
RUN bitfield mask; /* Ad gees is up (can transmit _pkts over it) 
RTG bitfield mask; /* Partner is a cousing node (PH3,PH4-1,PH4-2) 
LSN bitfield mask; /* Listen timer is ticking 


b 

end STS_BITS; 
end STS_OVERLAY; 
PTYPE byte ret grets /* Type of partner node (routing, non-routing, etc.) 
constant PTY_UN equals -1 prefix ADJ tag $C; /* Node type is unknown 
constant PTY_PH equals 0 prefix ADJ tag $C; /* Phase III full routing 
constant PTY_PH3N equals 1 prefix ADJ tag $C; /* Phase III non routing 
constant PTY_PH2 equals ¢ prefix ADJ tag $C; /* Phase II 
constant PTY_AREA equals prefix ADJ tag $C; /* Phase IV area routing 
constant PTY_PH4 equals 4 
constant PTY_PH4 equals 5 


tal prefix ADJ tag $C; /* Phase IV routing 
LPD_OVERLAY Union fill; 


prefix ADJ tag $C: /* Phase IV non routing 


LPD word unsigned; /* Path ID 
LPD_FIELDS structure fill; 
LPD_INX byte unsigned; /* Path index 
LPD_SEQ Sd unsigned; /* Path sequence 
end LPD_FIELDS; 
end LPD_OVERLAY; 
PNA word unsigned; /* Partner node address 
BUFSIZ word unsigned; /* Mt aoe block size ; 
INT_LSN word unsigned; /* Listener interval (computed from neighbor's hello) 


TIM_LSN word unsigned; /* Listener timer (seconds left 


BCPRI byte unsiane : /* Broadcast priority 
constant ‘“‘LENGT " equals . prefix ADJ$ tag K; /* Structure size 
constant "‘LENGTH’’ equals . prefix ADJ$ tag C; /* Structure size 


end ADJDEF; 
end_module SADJDEF; 
module $XMCDEF; 
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. DMC counter block - provides offsets for SHOW Q10 return of counters 


/e= 


apereaete XMCDEF structure fill prefix XMC$; 
XATBYTCNT Longword unsigned; 

RCVBYTCNT eee unsigned; 

XMTMSGCNT word unsigned; 

RCVMSGCNT word unsigned; 

RCVNOBUF word unsigned; 

RCVHDRBCC word unsigned; 

RCVDATBCC word unsigned; 

XMTNOBUF word unsigned; 

XMTHDRBCC word unsigned; 

XMTDATBCC word unsigned; 

XMTREPS word unsigned; 

RCVREPS word unsigned; 

constant ‘LENGTH’ equals . prefix XMC$ tag K; 

constant ‘LENGTH’ equals . prefix XMC$ tag C; 
end XMCDEF; 


end_module SXMCDEF ; 
module SLTSDEF; 


Length 
Length 


bytes transmitted 
bytes received 
msgs transmitted 
msgs receive 
no buffer'’ NAKS received 


f "header BCC error’’ NAKS received 


“data BCC error’ NAKS received 


f ''no buffer'’ NAKS xmitted 


“header BCC error’’ NAKS xmitted 
“data BCC error’’ NAKS xmitted 
REPS xmitted 

REPS received 

of counter block 

of counter block 
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@ 
/* 
/* 
/* 
/* 
/ 


t 
/* 


LINK TABLE - LTB 


This structure is maintained by NSP (NETDRIVER). 


Link slots. 


aggregate LTBDEF structure fill prefix LTB$; 


-NXT Longword unsigned; 


SLT_i9T word unsigned; 

SLT_LMY word en 

SIZE woru unsigned; 

TYPE byte ott meet 

SPARE byte unsigned; 

XWB Longword unsicned; 

SLOTS Longword unsigned; 

constant LENGTH’ equals . prefix LTB$ tag K; 
constant ‘LENGTH’ equals . prefix LTB$ tag C; 


end LTBDEF; 
end_module S$LTBDEF; 
module $ICBDEF; 
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It contains all 
local ‘end communications layer’ parameters and a vector of logical 


Pointer into the Link slot vector of the 

slot candidate to be tried the next time 

a link slot needs to be allocated 

Total slots in vector 

Total useable slots in vector 

Size, in meses, of this structure 

Structure identifier 

Reserved for future use 

XWB Listhead 

The soe rntne of the logical Link slot vector. 
Structure size 

Structure size 

This is the first slot, not a pointer to it. 
Each slot in the vector is 4 bytes. If the 
low bit is set then the slot is available and 
its sequence number (number of times used) is 
found in the high order word, If the low bit 
is clear then the slot contains a pointer to 
a structure containing the Link context and 
state information. 


This vector is terminated by a longword of all 
ones followed by a longword of all zeroes. 
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NE TNPAGED.SDL;1 

/* 

/* INTERNAL CONNECT BLOCK = used to pass generic connect information 

/* between the Network ACP and an End Communi- 
i. cations Layer (ECL) driver (e.g. NETDRIVER) 


aggregate ICBDEF structure fill prefix ICB$; 
PATH word unsigned; 


OCLNK word unsigned; 

M_OCON word unsigned; 

M_INACT word unsigned; 

ZE word unsigned; 

PE byte ang i prees 

LL_1 byte fill prefix ICBDEF tag $$; 
TRAN word unsigned; 


constant LPRNAM 
LPRNAM byte unsigned; 
LPRNAM character Length 19; 
constant RPRNAM equals 20 prefix 
RPRNAM byte unsigned; 
RPRNAM_OVERLAY union fill; 

RPRNAM character Length 19; 


RPRNAM_FIELDS structure fill; 
DSTFMT byte unsigned; 
DSTOBJ byte unsigned; 
DSTDSC character; 
constant ACCES 
NAM_FIELDS 
end RPRNAM OVERLAY: 
gned; 
ACCESS character Length 63; 


je Ff USER,B 

je F USER.T,39 

Te PSW.B 7* Count of 
je F PSW.T,39 


equals 20 prefix ICB tag $C; / 


/ 
/* Count of bytes used 
/* ‘User’ field of account to be connected to 
: t bytes used in next field 
/* ‘Password’’ field of that account 


/* Path number (logical Line) over which connect 
* was received or is to be transmitted. It 
* contains a sequence number in the high byte. 
* A value of zero indicates no path specified. 
* Local Link address 
* Outbound connect timer, in seconds 
* Maximum inactivity timer, in seconds 
* Bytes allocated for structure 
* Contains structure type code 
* (spare) 
/* Maximum consecutive retransmissions before the 
* Link is forcibly disconnected 
* Retransmission timer delay factor 
* Retransmission timer delay weight 
* Maximum receive data segment size, in bytes, 
* ag End Communications Layer protocol. 
* Maximum len 
® 
t 


gth of counted process name 
Count of by 


es used in next field 
Local process name 


/ 
ICB tag $C; /* Maximun Length of counted process name 


* Count of bytes used in next field 
* Remote process name 


/* Process names contain a type field in the 
/* first byte, and have the following formats: 


/* <0> followed by 1 byte non-zero object .+ 
/* <1> followed by an object type followed by 

/* a counted (16 text bytes,max) object name 
/* <2> followed by an object type followed by 

/* 2 byte group code, 2 byte user code, and 
/* a counted (12 text bytes,max) object name 


/* Format byte of remote process name 
/* Object type byte of remote process name 
estination descriptor part of remote proc name 


/* D 
equals 64 prefix ICB tag $C;/* Maximum combined composite access string Length 


/* Count of bytes in following field 

/* Concatenated access control strings, with subfield 

/* maximum lengths as follows (note that the sum of 

* the actual pettets Lengths must be less than 63): 
e 


th 
in next 
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/e =F ACCT,.B /* Count of bytes used in next field 
/e =F ACCT,T,39 /* ‘Account’ field of that account 


DATA byte unsigned; /* Count of bytes used in next field 
DATA character Length 16; /* Optional connect data 
REMNOD word unsign /* Network address of partner 
FILL word title ao Oe ICBDEF tag $$; /* Spare for alignment 
FILL_5 byte aces pretin ICBDEF tag $$; /* Spare for alignment 
RID” byte unsigned; /* Remote user (process, task, etc.) i.d. 
RID c aracter> Length 16; /* 
constant "LENGTH': equals . prefix 1(BS tag K; /* Structure size 
constant ‘LENGTH’ equals . pret is ICBS tag C; /* Structure size 
constant RID equals 16 prefix 108° tag $C; /* Max size of RID text field 


end ICBDEF; 
end_module SICBDEF; 
module SNETUPDDEF ; 


M 
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/+ 


/* 
- Function codes for XWB update routine (ACP communication routine) 


/*= 


/* Code 
constant ( 
ABO /* Breaking Link 
» CONNECT /* Give NCB to task w/ declared name or object 
» EXIT /* Task is exiting 
- PROCRE /* Starting a new process 
» DLL_ON /* Datalink starting for normal use 
- DLL_OLE /* Datalink starting for service functions 
» CRECNK /* Create a logical Link control block 
- ABOLNK /* Abort all Links = network shutdown 
- DSCLNK /* Disconnect the specified Link 
» BROCST /* Broadcast mailbox message 
- REPLY /* Send mailbox message to a specific mailbox 
» REACT_RCV /* Reactivate datalink receiver 
» SEND_AELLO /* Send hello message immediately 
. GET_ADJ /* Get output ADJ for a given node address 
TEST_ADJ /* Test if given node is adjacent to endnode 
§ equals 1 increment 1 prefix NETUPD tag $; 


end_module SNETUPDDEF ; 
module SNETMSGDEF ; 


{re 
Define event codes used to pass blocks to the ACP 
® 


/t- 


/* 
constant ( 

UNK /* Unknown message 
» BLL /* Illegal message 
- TR /* Transport control message - 
- IRP /* IRP from datalink which is shutting down 
- APL /* Aged packet 
» NUL /* Node unreachable packet 
» NOL /* Node out of range packet 
. PFE /* Packet format error 
- LSN /* Listner timer expired 
- OPL /* Oversized packet loss 
. CRD /* Circuit run down 

ADJ /* Adjacency up 
j equals 1 increment 1 prefix NETMSG tag $C; 


end_module SNE TMSGDEF ; 
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